home *** CD-ROM | disk | FTP | other *** search
- object frmRunningTasks: TfrmRunningTasks
- Left = 413
- Top = 225
- BorderIcons = [biSystemMenu]
- BorderStyle = bsDialog
- Caption = 'AutoMate Tasks'
- ClientHeight = 217
- ClientWidth = 417
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- FormStyle = fsStayOnTop
- OldCreateOrder = True
- Position = poScreenCenter
- OnActivate = FormActivate
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object lblRunningTasks: TLabel
- Left = 4
- Top = 48
- Width = 309
- Height = 13
- AutoSize = False
- Caption = '&Running Tasks'
- FocusControl = lstRunningTasks
- end
- object Image1: TImage
- Left = 4
- Top = 4
- Width = 37
- Height = 33
- Picture.Data = {<image000.ico>}
- end
- object Label1: TLabel
- Left = 44
- Top = 4
- Width = 365
- Height = 45
- AutoSize = False
- Caption =
- 'Highlight an entry below and select '#39'End Task'#39' to stop a running' +
- ' task. This option is useful to halt errant tasks.'
- FocusControl = lstRunningTasks
- WordWrap = True
- end
- object comKillTask: TButton
- Left = 4
- Top = 188
- Width = 97
- Height = 25
- Caption = '&End Task'
- Default = True
- Enabled = False
- TabOrder = 0
- OnClick = comKillTaskClick
- end
- object comKillAll: TButton
- Left = 108
- Top = 188
- Width = 90
- Height = 25
- Caption = 'End &All'
- TabOrder = 1
- OnClick = comKillAllClick
- end
- object comCancel: TButton
- Left = 335
- Top = 188
- Width = 75
- Height = 25
- Cancel = True
- Caption = '&Cancel'
- ModalResult = 2
- TabOrder = 2
- end
- object lstRunningTasks: TListView
- Left = 4
- Top = 64
- Width = 405
- Height = 117
- Columns = <
- item
- Caption = 'Task Name'
- Width = 130
- end
- item
- Caption = 'Line'
- Width = 40
- end
- item
- Caption = 'Started'
- Width = 139
- end
- item
- Caption = 'Status'
- Width = 75
- end>
- HideSelection = False
- ReadOnly = True
- RowSelect = True
- PopupMenu = PopupMenu1
- TabOrder = 3
- ViewStyle = vsReport
- OnDeletion = lstRunningTasksDeletion
- OnSelectItem = lstRunningTasksSelectItem
- end
- object IvTranslator1: TIvTranslator
- DictionaryName = 'dcoAutoMate5'
- Left = 9
- Top = 408
- TargetsData = (
- 1
- 7
- (
- '*'
- 'Hint'
- 0)
- (
- '*'
- 'Caption'
- 0)
- (
- '*'
- 'Items'
- 0)
- (
- 'TMemo'
- 'Text'
- 0)
- (
- '*'
- 'Lines'
- 0)
- (
- 'TdxBarButton'
- 'Hint'
- 0)
- (
- 'TRichEdit'
- 'Text'
- 0))
- end
- object PopupMenu1: TPopupMenu
- OnPopup = PopupMenu1Popup
- Left = 280
- Top = 184
- object itmEndtask: TMenuItem
- Caption = '&End Task'
- OnClick = itmEndtaskClick
- end
- object EndAll1: TMenuItem
- Caption = 'End &All'
- OnClick = EndAll1Click
- end
- object itmForceTask: TMenuItem
- Caption = '&Force Task'
- OnClick = itmForceTaskClick
- end
- end
- end
-